50 POKE53280,0:POKE53281,0:POKE53272,23
100 PRINT"[147][156]            [215][200][195][160][197]NTERPRISES
105 [153]"            (null)(null)(null)CHR$  (LEN) VALSTR$-48
110 PRINT"              [215][207][210][196]  [213][211][193][199][197] [146]
115 [153]"LIST     PEEKASED ON (null)CSTR$ONALD (null)UBLISHING'S
120 PRINT"[158]     >>>>> [215]ORD [213]SAGE [196]EMONS <<<<<
125 [141]150
130 [137]200
150 [129]T[178]1[164]2000:[130]
155 [153]"CONT      (null)RESS (null)(null)ATNLENVALCLOSEPEEKATN(null) TO CONTINUE
160 GETR$:IFR$<>CHR$(32)THEN160
165 RETURN
200 PRINT"[147][159] [212]HE MATERIAL IN THE FOURTEEN
210 [153]" EXERCISES ON THIS DISK ARE DERIVED
220 PRINT" FROM THE [205]C [196]ONALD [208]UBLISHING
230 [153]" LENOMPANY BOOK, (null)(null)(null)STR$ (null)(null)ATNCHR$VAL STR$VAL(null)(null)(null)(null).
240 PRINT"[159] [197]ACH EXERCISE PRESENTS 15 QUESTIONS
250 [153]" AND THE PUPIL IS REQUIRED TO TYPE
260 PRINT" THE CORRECT WORD TO FILL A BLANK.
270 [153]" VALACH EXERCISE IS SCORED AND A PUPIL
280 PRINT" MAY BE ASKED TO REPEAT AN EXERCISE
285 [153]" IF TOO MANY MISTAKES ARE MADE."
290 [141]150
300 [153]"LOAD VAL(null)VAL(null)LENRIGHT$(null)VALCLOSE1 > OPENTHIS - THAT
310 PRINT"          2 > [159]MOST - ALMOST
320 [153]"          3 > OPENREAL - VERY
330 PRINT"          4 > [159]MORE - MOST
340 [153]"         CLOSE5 > OPEN...ER - ...EST
350 PRINT"          6 > [159]THERE - HERE - WHERE
360 [153]"          7 > OPENGOOD - WELL"
370 [141]150
400 [153]"LOAD VAL(null)VAL(null)LENRIGHT$(null)VAL 8 > OPENBETWEEN - AMONG
410 PRINT"          9 > [159]IN - INTO
420 [153]"         10 > OPENLIE - LAY
430 PRINT"         11 > [159]LET - LEAVE
440 [153]"         12 > OPENSIT - SET
450 PRINT"         13 > [159]CAN - MAY
460 [153]"         14 > OPENWHO - WHOM - WHICH"
470 [141]150
500 [153]"LOADOPEN (null)OU HAVE A CHOICE:
510 PRINT" [208]RESS  [210] [146] TO REPEAT INSTRUCTIONS
520 [153]" (null)RESS  (null) WAIT TO GO TO THE DISK MENU
530 GETR$:IFR$<>"R"ANDR$<>"[210]"ANDR$<>"M"ANDR$<>"[205]"THEN530
540 IFR$="R"THEN100
550 IFR$="[210]"THEN100
560 PRINT"[147][210]ETURNING TO THE DISK MENU
570 [147]"MENU",8
580 [138]
590 [128]
600 [143] WHC 93:04:26